<!doctype HTML public "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- Click to Convert 5.2: Anything to HTML -->
<!-- http://www.clicktoconvert.com -->

<html>
<head>
<title>gravityboxscheduleuserguide - page 157 of 234</title>
<meta http-equiv=content-type content=text/html;charset=iso-8859-1>
<meta name="Generator" content="Click to Convert">

<!--Start of page styles-->
<STYLE TYPE="text/css">
<!--
 /* Foreground Image Styles */
 .style157p163{position:absolute;left:202px;top:164px}

 /* Position Styles */
 .ts157p0{position:absolute;left:106px;top:97px;}
 .ts157p1{position:absolute;left:352px;top:97px;}
 .ts157p3{position:absolute;left:665px;top:97px;}
 .ts157p7{position:absolute;left:106px;top:113px;}
 .ts157p8{position:absolute;left:706px;top:1026px;}
 .ts157p9{position:absolute;left:331px;top:1044px;}
 .ts157p13{position:absolute;left:376px;top:145px;}
 .ts157p15{position:absolute;left:634px;top:415px;}
 .ts157p16{position:absolute;left:106px;top:430px;}
 .ts157p17{position:absolute;left:106px;top:449px;}
 .ts157p18{position:absolute;left:106px;top:467px;}
 .ts157p19{position:absolute;left:106px;top:486px;}
 .ts157p21{position:absolute;left:106px;top:504px;}
 .ts157p23{position:absolute;left:106px;top:522px;}
 .ts157p24{position:absolute;left:106px;top:542px;}
 .ts157p26{position:absolute;left:106px;top:560px;}
 .ts157p27{position:absolute;left:106px;top:578px;}
 .ts157p29{position:absolute;left:106px;top:596px;}
 .ts157p31{position:absolute;left:106px;top:614px;}
 .ts157p33{position:absolute;left:106px;top:632px;}
 .ts157p35{position:absolute;left:106px;top:650px;}
 .ts157p37{position:absolute;left:106px;top:669px;}
 .ts157p39{position:absolute;left:106px;top:687px;}
 .ts157p42{position:absolute;left:106px;top:705px;}
 .ts157p44{position:absolute;left:106px;top:723px;}
 .ts157p46{position:absolute;left:106px;top:741px;}
 .ts157p48{position:absolute;left:106px;top:759px;}
 .ts157p50{position:absolute;left:106px;top:777px;}
 .ts157p53{position:absolute;left:106px;top:795px;}
 .ts157p55{position:absolute;left:106px;top:814px;}
 .ts157p57{position:absolute;left:106px;top:832px;}
 .ts157p59{position:absolute;left:106px;top:850px;}
 .ts157p61{position:absolute;left:106px;top:868px;}
 .ts157p63{position:absolute;left:106px;top:886px;}
 .ts157p66{position:absolute;left:106px;top:904px;}
 .ts157p68{position:absolute;left:106px;top:922px;}
 .ts157p70{position:absolute;left:106px;top:940px;}
 .ts157p72{position:absolute;left:106px;top:959px;}
 .ts157p74{position:absolute;left:106px;top:977px;}

 /* Font Styles */
 .ft0p157{font-style:normal;font-weight:bold;font-size:13px;font-family:arial,sans-serif;color:#000000;}
 .ft1p157{font-weight:normal;}
 .ft2p157{font-style:normal;font-weight:normal;font-size:13px;font-family:"times new roman","times new roman",times,serif;color:#000000;}
 .ft3p157{font-style:normal;font-weight:normal;font-size:16px;font-family:"times new roman","times new roman",times,serif;color:#000000;}
 .ft4p157{font-style:normal;font-weight:bold;font-size:11px;font-family:arial,sans-serif;color:#000000;}
 .ft5p157{font-style:normal;font-weight:bold;font-size:16px;font-family:helvetica,arial,sans-serif;color:#000000;}
 .ft6p157{font-style:normal;font-weight:normal;font-size:16px;font-family:arial,sans-serif;color:#000000;}
 .ft7p157{font-style:normal;font-weight:normal;font-size:16px;font-family:"courier new",courier,monospace;color:#000000;}

 /* Background Style */
 .styleBackground157{position:absolute;left:97px;top:540px}

 /* Navigation Styles */
 .styleNavBarTop{position:absolute;left:0px;top:2px}
 .nb{position:absolute;left:2px;top:0px}
 .nbs{position:absolute;left:0px;top:0px}
 .nbe{position:absolute;left:836px;top:0px}
 .styleNavBarBot{position:absolute;left:0px;top:1117px}
-->
</STYLE>
<!--End of page styles-->

</head>
<body bgcolor="#ffffff" text="#000000" link="#0000FF" Vlink="#660099">

<table id="pageTable" width="836" STYLE="position: relative; left: auto; top: auto;"><tr><td>
<div class=nbs><img src="./navbarstart.gif" width="2" height="30"></div>
<div class=nb><img src="./navbar.gif" width="836" height="30" alt="Navigation bar"></div>
<div class=nbe><img src="./navbarend.gif" width="2" height="30"></div>
<div class=styleNavBarTop>
<table width="834" height="26" border="0" cellspacing="0">
  <tr align="left">
    <td width="4">&nbsp;</td>
    <td width="25" align="center"><a href="http://www.gravitybox.com" target="_parent"><img src="./home.gif" border="0" alt="Home"></a></td>
    <td width="25" align="center"><a href="#" onClick="window.open('./print.html','Printing','width=300,height=100,toolbar=no,directories=no');return false;"><img src="./print.gif" border="0" alt="Print document"></a></td>
    <td width="10" align="center"><img src="./separator.gif" border="0"></td>
    <td width="18" align="center"><a href="./index1.html"><img src="./start.gif" width="18" height="14" border="0" alt="Start"></a></td>
    <td width="18" align="center"><a href="./index156.html"><img src="./back.gif" width="14" height="14" border="0" alt="Previous page"></a></td>
    <td width="80" valign="middle"><table width="100%" height="16" border="0" cellspacing="1" bgcolor="#ACA899"><tr><td align="center" bgcolor="#ffffff"><font face=verdana,arial,sans-serif><font size="1">&nbsp;157 of 234&nbsp;</font></font></td></tr></table></td>
    <td width="18" align="center"><a href="./index158.html"><img src="./forward.gif" width="14" height="14" border="0" alt="Next page"></a></td>
    <td width="18" align="center"><a href="./index234.html"><img src="./end.gif" width="18" height="14" border="0" alt="End"></a></td>
    <td width="620">&nbsp;</td>
  </tr>
</table>
<p>
</div>
<nobr>
<div class=styleBackground157><img src="./background157.png" width="633" height="515" border="0" alt=""></div>
<div class=style157p163><img src="./image157_163.png" width="432" height="266" border="0" alt=""></DIV>
<div class=ts157p0><span class="ft0p157"> </span></div>
<div class=ts157p1><span class="ft0p157">Gravitybox Schedule Primer<span class="ft1p157"> </span></span></div>
<div class=ts157p3><span class="ft0p157">Page 155&nbsp; </span></div>
<div class=ts157p7><span class="ft2p157"> </span></div>
<div class=ts157p8><span class="ft3p157"> </span></div>
<div class=ts157p9><span class="ft4p157">1998&#45;2004 Gravitybox Software LLC<span class="ft3p157"> </span></span></div>
<div class=ts157p13><span class="ft5p157">Figure 16.3 </span></div>
<div class=ts157p15><span class="ft6p157"> </span></div>
<div class=ts157p16><span class="ft6p157"> </span></div>
<div class=ts157p17><span class="ft6p157">A contact has much associated information. After the user modifies the properties on </span></div>
<div class=ts157p18><span class="ft6p157">the screen, he may press the Ok button to save the information. In the save routine the </span></div>
<div class=ts157p19><span class="ft6p157">text boxes on the screen are used to set the contact object&#146;s properties with the new </span></div>
<div class=ts157p21><span class="ft6p157">values. </span></div>
<div class=ts157p23><span class="ft6p157"> </span></div>
<div class=ts157p24><span class="ft7p157">Private Sub cmdButton_Click(Index As Integer) </span></div>
<div class=ts157p26><span class="ft7p157"> </span></div>
<div class=ts157p27><span class="ft7p157">&nbsp; ReDim ParOut(1) </span></div>
<div class=ts157p29><span class="ft7p157">&nbsp; Select Case Index </span></div>
<div class=ts157p31><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp; </span></div>
<div class=ts157p33><span class="ft7p157">&nbsp;&nbsp;&nbsp; Case 0: 'Ok </span></div>
<div class=ts157p35><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Address = txtAddress.Text </span></div>
<div class=ts157p37><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Anniversary = IIf(IsNull(dtAnniversary.Value), _ </span></div>
<div class=ts157p39><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 0, dtAnniversary.Value) </span></div>
<div class=ts157p42><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Birthday = IIf(IsNull(dtBirthDate.Value), 0, _ </span></div>
<div class=ts157p44><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; dtBirthDate.Value) </span></div>
<div class=ts157p46><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Company = txtCompany.Text </span></div>
<div class=ts157p48><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Email = txtEMail.Text </span></div>
<div class=ts157p50><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.HomePageAddress = txtHomePageAddress.Text </span></div>
<div class=ts157p53><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Name = txtName.Text </span></div>
<div class=ts157p55><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Notes = txtNotes.Text </span></div>
<div class=ts157p57><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.PhoneBusiness = txtPhoneBusiness.Text </span></div>
<div class=ts157p59><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.PhoneBusinessFax = txtPhoneBusinessFax.Text </span></div>
<div class=ts157p61><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.PhoneHome = txtPhoneHome.Text </span></div>
<div class=ts157p63><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.PhoneMobile = txtPhoneMobile.Text </span></div>
<div class=ts157p66><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Contact.Category = txtCategories.Text </span></div>
<div class=ts157p68><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ParOut(0) = True </span></div>
<div class=ts157p70><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp; </span></div>
<div class=ts157p72><span class="ft7p157">&nbsp;&nbsp;&nbsp; Case 1: 'Cancel </span></div>
<div class=ts157p74><span class="ft7p157">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ParOut(0) = False </span></div>
<div class=styleNavBarBot>
<table width="836" border="0" cellspacing="2">
  <tr></tr>
  <tr>
    <td width="118"><a href="http://www.purepage.com"><img src="./smalllogo.gif" width="118" height="46" border="0" alt="http://www.purepage.com"></a></td>
    <td></td>
  </tr>
</table>
</div>

</td></tr></table>

</body>
</html>
